    If IsNumeric(Target.Value) Then
        Application.EnableEvents = False
        Target.Value = "Text Only!"
        Application.EnableEvents = True
    End If